home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1995 November
/
EnigmA AMIGA RUN 02 (1995)(G.R. Edizioni)(IT)[!][issue 1995-11][Skylink CD].iso
/
earcd
/
program
/
gcc
/
libmat.lha
/
src
/
mconst3.cc
< prev
next >
Wrap
C/C++ Source or Header
|
1980-01-01
|
316b
|
23 lines
// MATRIX LIB
// TOMMY JOHANSSON 1995
#include "matrix.h"
Matrix::Matrix(int x)
{
int i,j;
#ifdef DEBUG
printf("Initierar %dx%d nollmatris.\n",x,x);
#endif
koff=alloc(x+1,x+1);
if(koff==NULL)
{
puts("Minnet slut");
exit(0);
}
m=x;
n=x;
for(i=1;i<=x;i++)
for(j=1;j<=x;j++)
koff[i][j]=0.0;
}